//===========================================
// [] The PlutoEA Project []
// http://opensvn.csie.org/PlutoEA
// -----------------------------------------
// - bڵ s@ -
//===========================================

payon_in01,5,134,4	script	oa ܴ	89,{
	if(Weight*100/MaxWeight >= 90) {
		mes "[oa ܴ]";
		mes "A{btӭFAs鳣í";
		mes "FMzLAӪ";
		mes "ڷ|@AťF";
		mes "զ|ݰ_ӪGƵAť";
		close;
	}
	mes "[oa ܴ]";
	mes "ڬOѤ~oa ܴ!";
	mes "ڳo@oF@ӡAWddv~!";
	mes "NO^FF0000]kbbڵ^000000!!";
	next;
	mes "[oa ܴ]";
	mes "ڷQFnXQ~...";
	mes "ެOUjB٬OUj...";
	mes "FťXڷQo쪺G!";
	mes "wgo{pQ]Obڿ@Y";
	mes "s@ia^0000FF]kbbڵ^000000";
	mes "!";
	next;
	emotion 21;
	mes "[oa ܴ]";
	mes "o﮳}aӻ";
	mes "O@jRʪ~!";
	mes "s@XӪF";
	mes "uOѤѤѤѤѤ~oa ܴ!!!";
	next;
	mes "[oa ܴ]";
	mes "A Qnbbڵ?";
	mes "ڲqӪ~Aӻ";
	mes "OAߤD`N~a!HH";
	next;
	switch (select("bڵ:Kbڵ:Kbڵ:ݽbڵ:bڵ:Ƚbڵ:Fbڵ:aFbڵ:Fbڵ:vlbڵ:Lνbڵ:K׽bڵ")) {
	case 1:
		setarray .@arr[0],1750,12004;
		break;
	case 2:
		setarray .@arr[0],1770,12005;
		break;
	case 3:
		setarray .@arr[0],1753,12006;
		break;
	case 4:
		setarray .@arr[0],1765,12007;
		break;
	case 5:
		setarray .@arr[0],1752,12008;
		break;
	case 6:
		setarray .@arr[0],1751,12009;
		break;
	case 7:
		setarray .@arr[0],1755,12010;
		break;
	case 8:
		setarray .@arr[0],1756,12011;
		break;
	case 9:
		setarray .@arr[0],1754,12012;
		break;
	case 10:
		setarray .@arr[0],1767,12013;
		break;
	case 11:
		setarray .@arr[0],1757,12014;
		break;
	case 12:
		setarray .@arr[0],1762,12015;
		break;
	}
	if(countitem(.@arr[0])<500 || Zeny<500) {
		mes "[oa ܴ]";
		mes "oO" +getitemname(.@arr[0])+ "iH";
		mes "J500ubڪjbڵ";
		mes "]ΧڦۤvSBz";
		mes "񪽱500ub";
		mes "٭n[K";
		next;
		mes "[oa ܴ]";
		mes "?oOO@F_~O!";
		mes "ڳo]OXF@_ۧr!";
		mes "{{_Y@˯!oNOڪ_!";
		mes "pݭnoӽbڵܽбa" +getitemname(.@arr[0])+ "500u";
		mes "M500ӧa";
		mes "ڷ|⥦bbڵ̩MA洫";
		close;
	}
	mes "[oa ܴ]";
	mes "~A!";
	mes "naۤ@ӾAX~";
	mes "nn";
	mes "^FF0000500Zeny^000000ոլݩO";
	mes getitemname(.@arr[0])+ "500";
	mes "ڷ|500ӽbکbbڵ̩MA洫o";
	next;
	switch (select("Ƴ洫:us@@:ڤQ洫C")) {
	case 1:
		set .@have,countitem(.@arr[0]);	//کҫ
		set .@max,.@have/500;		//̤j洫
		set .@price,.@max*500;		//ƪ
		mes "[oa ܴ]";
		mes "֦bڼƶq" +getitemname(.@arr[0])+ " :";
		mes "^0000FF" +.@have+ " ^000000";
		mes "iHզXbڵƶq" +getitemname(.@arr[1])+ " :";
		mes "^0000FF" +.@max+ " ^000000";
		mes "զXɻݭn :";
		mes "^0000FF" +.@price+ " Zeny^000000";
		next;
		mes "аݧAn洫?";
		next;
		if(select("ڭn洫:ڤQ洫C")==2) {
			mes "[oa ܴ]";
			mes "۫Hڸեάݬݧa...";
			mes "ouO@ӰjoHΰjo{...";
			close;
		}
		break;
	case 2:
		set .@max,1;
		set .@price,500;
		break;
	case 3:
		mes "[oa ܴ]";
		mes "۫Hڸեάݬݧa...";
		mes "ouO@ӰjoHΰjo{...";
		close;
	}
	delitem .@arr[0],.@max*500;
	set Zeny,Zeny-.@price;
	getitem .@arr[1],.@max;
	mes "[oa ܴ]";
	mes "ӡAoӪ~ЧAUa";
	mes "t~^0000FF@I`Nƶ^000000ЧAO";
	mes "^FF0000qWL90%ܡAobڵNϥΪ";
	mes "OoФpߤnFAF|V|^000000";
	close;
}
